From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 6 Mar 1993 06:10:05 +0000 (+0000)
Subject: (emerge-show-file-name): Handle any kind of event.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~97031
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=bfd72d065f00149129866d90a774f0e58d64f6d5;p=emacs.git

(emerge-show-file-name): Handle any kind of event.
---

diff --git a/lisp/emerge.el b/lisp/emerge.el
index 2309c6db93a..09c29fbb680 100644
--- a/lisp/emerge.el
+++ b/lisp/emerge.el
@@ -2908,8 +2908,8 @@ SPC, it is ignored; if it is anything else, it is processed as a command."
 	    (while (and (not (pos-visible-in-window-p))
 			(> (1- (frame-height)) (window-height)))
 	      (enlarge-window 1))
-	    (let ((c (read-char)))
-	      (if (/= c 32)
+	    (let ((c (read-event)))
+	      (if (not (eq c 32))
 		  (setq unread-command-events (list c)))))))))
 
 ;; Improved auto-save file names.